home *** CD-ROM | disk | FTP | other *** search
/ Scene 96 / Scene 96 International Edition (Zyklop Software) (Disc 2) (1997).iso / misc / coding / xmasspak / noter / depack.inc < prev    next >
Encoding:
Text File  |  1996-03-26  |  890 b   |  39 lines
  1. ;-----------------------------------------------------
  2. ;
  3. ; DEPACK-ROUTINE
  4. ;
  5. ; ES:SI = Pointer to adress of the packed datas
  6. ; FS:DI = Pointer to adress to depack the datas (now 64000 bytes to depack)
  7. ;
  8.  
  9. unpack_it:    nop
  10.  
  11. up4:          mov al,[es:si]
  12.               and al,10000000b
  13.               cmp al,128
  14.               jne up1
  15.               mov cl,[es:si]
  16.               mov al,[es:si+1]
  17.               sub cl,128
  18. up2:          mov [fs:di],al
  19.               inc di
  20.               cmp di,32*2000
  21.               je up3
  22.               dec cl
  23.               jnz up2
  24.               add si,02h
  25.               jmp up4
  26.  
  27. up1:          mov al,[es:si]
  28.               mov [fs:di],al
  29.               inc di
  30.               cmp di,32*2000
  31.               je up3
  32.               inc si
  33.               jmp up4
  34.  
  35. up3:          ret
  36.  
  37.  
  38. ;----------------------------------------------------
  39.